#Input: A file of text in which all words are separated by white space or punctuation like  comma, a semicolon, a  question mark, a period, or a colon. The input file is specified on command line. Output: A list of all unique words in the file in alphabetical order.









open(some,"some.txt") || die "can not open this file";
print "unique words in alphabatical order";
while(<some>)
{
$name = split (/[\.,; :!\?]\s*/);
}
@sortednames = sort ($name);
foreach $name (@sortednames)
print $name;

